perm filename JJ1[P11,LCS] blob
sn#339422 filedate 1978-03-09 generic text, type T, neo UTF8
SRATEā12800;
INS 0 1; < INSTRUMENT 1
< INST 1 (GLISS) SET P6 TO -1. P5 IS DESTINATION OF GLISS.
OSC P4 P8 B2 F1 P30;MLT P6 P3 B3;AD2 P5 B3 B3;OSC B3 P8 B3 F3 P29;
AD2 P3 B3 B3;OSC B2 B3 B3 F2 P28;OUT B3 B1;END;
GEN 0 1 1 .01 0 .99 25 .99 400 0 511;<GEN INPUT MUST ALWAYS START NEW LINE
GEN 0 2 2 .7 0 .5 0 .4 5;<F2 , 3 HARMONICS (1,3,5)
GEN 0 3 3 0 1;<F3 PUTS LINE FROM 0 TO 1 IN 511 STEPS
INSTRUMENTS;
GLIS 1 8 FREQ 3 5
END;
< IN1 .SCR -- RANDOM NUMBER= 1
PLAY;
GLIS 0.00 .58 G/2 500.00 G*2 , -1.00 2.50
;PRINT P1;< GLIS 1
FINISH; < IN1 .SCR